From 645d62199dfc9de6f8ef2e6af0cb38da810be17c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 11 Jun 1993 20:48:08 +0000 Subject: [PATCH] (sendmail-pre-abbrev-expand-hook): If last-command-char is not a character, don't do the expand here. --- lisp/mail/mailabbrev.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index 3ac665259a9..dcdf3708d60 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -460,7 +460,8 @@ characters which may be a part of the name of a mail-alias.") ;; the mail-mode-header-syntax-table. (set-syntax-table mail-mode-header-syntax-table) - (or (eq (char-syntax last-command-char) ?_) + (or (not (integerp last-command-char)) + (eq (char-syntax last-command-char) ?_) (let ((pre-abbrev-expand-hook nil)) ; That's us; don't loop. ;; Use this table so that abbrevs can have hyphens in them. (set-syntax-table mail-abbrev-syntax-table) -- 2.30.2